home *** CD-ROM | disk | FTP | other *** search
/ How Would You Survive? / How Would You Survive (1995)(Grolier)[Mac-PC].iso / mac / VPAN.DIR / 00755_Script_startmovie < prev    next >
Text File  |  1995-09-06  |  1KB  |  41 lines

  1. Global gBtn17, gBtn16, gWhatMovie, gSlider, gHotSpotStatus, gOpenHouse1, gOpenHouse2, gTheHelpIsOn,gReInitGlobals,gInitGlobals
  2.  
  3. on StartMovie
  4.   set gBtn16 = birth(script "a3StateButton", 46, 1931, "SV141819.AIF", "CrossEPan", "HandCursor")
  5.   set gBtn17 = birth(script "a3StateButton", 47, 1925, "SV141819.AIF", "CrossAPan", "HandCursor")
  6.   set gBeginYourLifeStatus = 1
  7.   set gHotSpotStatus = 0
  8.   set gWhatMovie = "VikingW.dir"
  9.   set the visible of sprite 2 to true
  10.   set gOpenHouse1 = 0
  11.   set the visible of sprite 3 to true
  12.   set gOpenHouse2 = 0
  13.   if gInitGlobals = 1 then
  14.     VInitGlobals
  15.     set gInitGlobals = 0
  16.   else
  17.     if gReInitGlobals = 1 then
  18.       GlobalSetUpFromTheatre
  19.       set gReInitGlobals = 0
  20.     end if
  21.   end if
  22.   set gTheHelpIsOn = 0
  23.   VGlobalsSetUpPan
  24. end
  25.  
  26. on StopMovie
  27.   hidecontrol (gBtn16)
  28.   hidecontrol (gBtn17)
  29.   set gBtn16 = 0  
  30.   set gBtn17 = 0
  31.   KillSlider(gSlider)
  32.   set the visible of sprite 2 to true
  33.   set the visible of sprite 3 to true
  34.   puppetsprite 25, false
  35.   puppetsprite 26, false
  36.   unload 1, 140
  37.   set gBeginYourLifeStatus = 0
  38.   set gHotSpotStatus = 0
  39. end
  40.  
  41.